home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / science / sm32a.zip / LIBRARY / REVERSE.LI < prev    next >
Text File  |  1993-10-16  |  162b  |  6 lines

  1. #    reverse(x) reverses a list x in revserse order.
  2. #    e.g. reverse([1,2,3]) gives [3, 2, 1]
  3.  
  4.  
  5. reverse(list_) := [ list(member(list,j), j,length(list),1,-1) ]
  6.